//三字棋

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

#define ROW 3
#define COL 3

void InitBoard(char board[ROW][COL],int row,int col);
void DisplayBoard(char board[ROW][COL],int row,int col);
void PlayerMove(char board[ROW][COL],int row,int col);
void ComputerMove(char board[ROW][COL],int row,int col);
char IsWin(char board[ROW][COL],int row,int col);
int IsFull(char board[ROW][COL],int row,int col);

void menu()
{
    printf("********************\n");
    printf("***1.play  2.exit***\n");
    printf("********************\n");
}

void game()
{
    char ret = 0;
    char board[ROW][COL] = { 0 };
    //初始化棋盘
    InitBoard(board,ROW,COL);
    //打印棋盘
    DisplayBoard(board,ROW,COL);
    //下棋
    while(1)
    {
        PlayerMove(board,ROW,COL);
        //判断输赢
        ret = IsWin(board,ROW,COL);
        if(ret != 'C')
        {
            break;
        }
        DisplayBoard(board,ROW,COL);
        ComputerMove(board,ROW,COL);
        //判断输赢
        ret = IsWin(board,ROW,COL);
        if(ret != 'C')
        {
            break;
        }
        DisplayBoard(board,ROW,COL);
    }
    if(ret == '*')
    {
        printf("玩家赢\n");
    }else if(ret == '#'){
        printf("电脑赢\n");
    }else{
        printf("平局\n");
    }
    DisplayBoard(board,ROW,COL);
}

int main()
{
    srand((unsigned int)time(NULL));//设置随机数生成起点的
    
    int input = 0;
    do
    {
        menu();
        printf("请选择:>>");
        scanf("%d",&input);
        switch(input)
        {
            case 1:
                game();
                break;
            case 0:
                printf("退出游戏\n");
                break;
            default:
                printf("选择错误，请重新选择!\n");
                break;
        }
    }while(input);
    
    return 0;
}

void InitBoard(char board[ROW][COL],int row,int col)
{
    int i = 0;
    for(i = 0; i < row; i++)
    {
        int j = 0;
        for(j = 0; j < col; j++)
        {
            board[i][j] = ' ';
        }
    }
}

void DisplayBoard(char board[ROW][COL],int row,int col)
{
    int i = 0;
    for(i = 0; i < row; i++)
    {
        //打印数据
        int j = 0;
        for(j = 0; j < col; j++)
        {
            printf(" %c ",board[i][j]);
            if(j < col-1)
                printf("|");
        }
        printf("\n");
        if(i < row-1)
        {
            int j = 0;
            for(j = 0; j < col; j++)
            {
                printf("---");
                if(j < col-1)
                    printf("|");
            }
        }
        printf("\n");
    }
}

void PlayerMove(char board[ROW][COL],int row,int col)
{
    int x = 0;
    int y = 0;
    printf("玩家下棋:>\n");
    while(1)
    {
        printf("请输入坐标:>\n");
        scanf("%d %d",&x,&y);
        if(x >= 1 && x <= row && y >= 1 && y <= col)
        {
            if(board[x - 1][y - 1] == ' ')
            {
                board[x - 1][y - 1] = '*';
                break;
            }else{
                printf("坐标被占用，不能下棋，请选择其他位置\n");
            }
        }else{
            printf("坐标非法,请重新输入\n");
        }
    }
}

void ComputerMove(char board[ROW][COL],int row,int col)
{
    printf("电脑下棋:>\n");
    int x = 0;
    int y = 0;
    while(1)
    {
        x = rand() % row;//0~2
        y = rand() % col;
        if(board[x][y] == ' ')
        {
            board[x][y] = '#';
            break;
        }
    }
}

//满了返回1，不满返回0
int IsFull(char board[ROW][COL],int row,int col)
{
    int i = 0;
    int j = 0;
    for(i = 0; i < row; i++)
    {
        for(j = 0; j < col; j++)
        {
            if(board[i][j] == ' ')
            {
                return 0;
            }
        }
    }
    return 1;
}

char IsWin(char board[ROW][COL],int row,int col)
{
    //行
    int i = 0;
    for(i = 0; i < row; i++)
    {
        if(board[i][0] == board[i][1] && board[i][1] == board[i][2] && board[i][1] != ' ')
        {
            return board[i][1];
        }
    }
    //列
    int j = 0;
    for(j = 0; j < col; j++)
    {
        if(board[0][j] == board[1][j] && board[1][j] == board[2][j] && board[1][j] != ' ')
        {
            return board[1][j];
        }
    }
    //对角线
    if(board[0][0] == board[1][1] && board[1][1] == board[2][2] && board[1][1] != ' ')
    {
        return board[1][1];
    }
    
    if(board[0][2] == board[1][1] && board[1][1] == board[2][0] && board[1][1] != ' ')
    {
        return board[1][1];
    }
    
    //没人赢，平局
    if(IsFull(board,ROW,COL))
    {
        return 'Q';
    }
    
    //游戏继续
    return 'C';
}
















